UUU UUU  VVV VVV 111 RRRRRRRRRRRR 000000000 MMM MMM 
UUU  VVV VVV 111 RRRRRRRRRRRR 000000000 MMM MMM 

UUU UUU  VVV VVV 111 RRRRRRRRRRRR 000000000 MMM MMM 
UUU UUU  VVV VVV 1171111 RRR RRR 000 000 MMMMMM = =6>MMMMMM 
UUU  VVV VVV 111111 RRR RRR 000 000 MMMMMM = 6MMMMMM 

UUU UUU  VVV VVV 111111 RRR RRR 000 000 MMMMMM ~=6MMMMMM 
UUU UUU  VVV VVV 111 RRR RRR 000 000 MMM MMM MMM 
UU VVV VVV 111 RRR RRR 000 000 MMM MMM = MMM 

UUU UUU  VVV VVV 111 RRR RRR 000 000 MMM MMM = =6MMM 
UU VV VVV 111 RRRRRRRRRRRR 000 000 MMM MMM 

UUU UUU  VVV VVV 111 RRRRRRRRRRRR 000 000 MMM MMM 
UUU UUU VVV VVV 111 RRRRRRRRRRRR 000 000 MMM MMM 
UUU UUU  ~VVV VVV 111 RRR = RRR 000 000 MMM MMM 
UUU UUU  VVV VVV 111 RRR = =RRR 000 000 MMM MMM 
UUU UUU 111 RRR = RRR 000 000 MMM MMM 
UUU UUU vVvvV VV 111 RRR RRR 000 000 MMM MMM 
UUU UUU VvVsOVVV 111 RRR RRR 000 000 MMM MMM 
UUU UUU VvV OV 111 RRR RRR 000 000 MMM MMM 
UU 1911711711 RRR RRR 000000000 MMM MMM 
UUUUUUUUUUUUUUU VVV 117171111 RRR RRR 000000000 MMM MMM 
UUUUUUUUUUUUUUU VVV 117111111 RRR RRR 000000000 MMM MMM 


**F ILE**1D**BOOTDRUVI 


BBBBBBBB 000000 000000 TTTTTTTTTT DODDDDDD RRRRRRRR UU Vv Vu 11 
BBBBBBBB 000000 000000 TTTTTTTTTT DODDDDDD RRRRRRRR UU UU VV VV 11 
BB BB 00 00 00 00 TT DOD DD RR RR UU VV VV 1111 
8B BB 00 00 00 00 TT DD DD RR RR UU UU VV vy 1111 
BB BB 00 00 00 00 TT DD DD RR RR UU UU VV VV 11 
BB BB 00 00 00 00 TT DD DD RR RR UU UU VV VV 11 
BBBBBBBB 00 00 00 00 TT DD DD RRRRRRRR UU UU VV VV 11 
00 00 00 00 TT DD DD RRRRRRRR UU UU VV VV 11 
BB BB 00 00 00 00 TT DD DD RR RR UU VV VV 11 
BB BB 00 00 00 00 TT DD DD RR RR UU UU VV VV 11 
BB BB 00 00 00 00 TT DD DD RR RR UU UU VV sVV 11 eee 
BB BB 00 00 00 00 TT DOD DD RR RR UU UU VW VV 11 eeee 
BBBBBBBB 000000 000000 TT DDDDDDDD RR RR = UUUUUUUUUU VV 111111 eees 
BBBBBBBB 000000 000000 TT DDDDDDDD RR RR = UUUUUUUUUU vv 111111 eeee 
LL III] SSSSSSSS 
LL W111 SSSSSSSS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] $$ 
LL I] SSSSSS 
LL I] SSSSSS 
LL I] SS 
LL I] SS 
LL I] SS 
LL I] SS 
LLLLLLLLLL 1111 SSSSSSSS 
LLELLLLLLLL 1111 SSSSSSSS 


4 : 
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Table of contents 4 

‘¢ 1 Declarations 

(3) DRIVER FIXED DATA AREA 

(4) BOO$QIO = BOOTSTRAP O10 ROUTINE 

(5) 87 BOOSMAP = ROUTINE TO MAP DATA FOR BOO$QIO 

(8) 644 BOOSSELECT = Select boot driver 

(9) 680 BOOSMOVE = Select and move boot driver 
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gooneee : 


Boor UVI_SWITCH = os ; Build Micro-VAX I bootstrap emulator 


WHE poorpR ¥} = DISPATCHER FOR BOOTSTRAP 1/0 DRIVERS FOR MICRO-VAX I 
» IDEN 


—PARAAAAARARRRARAAAAAAAAAAAALALALA LALA S ARERR RRR RRR EERE REE ELE EERE RRR E EEE SD 


COPYRIGHT | (c) 1978, 1980, 1982 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGH 3 RESERVED. 


OFTWARE IS FURNISHED UNDER A LICENSE AND MAY BE USED AND COPIED 
N_ ACCORDANCE WITH THE TERMS OF SUCH LICENSE AND WITH THE 
I F THE ABOVE C HIS TWARE ANY OTHER 
Pp 


—_ 


-* * 
:* oy 
** a 
-* # 
** e 
** oa 
** « 
‘* & 
:* R t 
;* 0 RSON. NO TITLE TO AND OWNERSHIP OF THE SOFTWARE IS HEREBY * 
;* TRANSFERRED. > 
‘fe a 
;* THE INFORMATION IN THIS SOFTWARE IS SUBJECT TO CHANGE wit HOUT NOTICE * 
;* AND SHOULD NOT * 
°f % 
‘* * 
‘* s 
** a 
:f * 
** * 
*f * 


BE CONSTRUED AS A COMMITMENT BY DIGITAL EQUIPMENT 
CORPORATION. 


B00! 
BOO! 
B00! 
BOO! 
B00! 
B00! 
BOO! 
B00! 
B00! 
BOO! 
BOO! 
B00! 
B00! 


DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
SOFTWARE ON EQUIPMENT WHICH IS NOT SUPPLIED BY DIGITAL. 


SOOOooooCoooooSo 
oooo 


ARR RRARASARAREAARALARALESASARRA LEASE RARER RRR ARERR RRR RR RAR RARER ERS R RRR RASS 


s++ 


FACILITY: 
Minimal bootstrap driver for all VMS system disks. 
ENVIRONMENT : 
Runs at IP kernel mode, memory management ¥ be on or off, 


IS=1 Bn Bal on interrupt stack), code must be PIC. 
ABSTRACT: 


This module contains a routine called BOO$QI0 that handles 1/0 
transfers to and from the VMS system disks. 


; AUTHOR: 
The VMAS group 
REVISION HISTORY: 
v03-008 K0M0070 Kathleen D. Morse 15-Aug-1983 
Create a Micro-VAX I version for use in VMBUVT.EXE. It 
has no buffered datapath or map register logic. 


v03-007 KDM0073 Kathleen D. Morse 22-Aug-1983 


=O OO NO NE WIN OOD NOA NE WWIN OOD NA UN EWI O ODO UP 
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Add exe? & ne C and EXESGL_UBDELAY to the fixed 
data cells used the bootstrap drivers. Create 
BQO symbols for these data cells. 


v03-006 TCM0004 udy F Matthews 02-Aug-1983 
Add definition ir EXESGB_CPUDATA cell. 


v03-005 KTA3059 Kerbey T. Altmann 21-Jun-1983 
Add entetes for unit disconnect and boot device name - 
thus bumping VMB version number. 


V03-004 RLRCPUDISP Robert L. Rappaport 15-Jun-1983 
Recode CPUDISP macros to use new format. 


v03-003 TCMO003 Trudy C. Matthews 23-Feb-1983 
suerqnent VMB version number to indicate adding RPBSL_BADPGS 


v03-002 TCM0002 rudy C. Matthews 05-Jan-1983 
Add 117790-specitic yath te BOOSPURDPR. 


V03-001 KTA0092 Kerbey T. Altmann 02-Apr-1982 
Bump the version number because of KTA0090. 


V02-021 KTA0090 Kerbey T. Altmann 26-Mar-1982 
Add new cell to 1OvEC” to contain address of microcode 
required by a booting device. 


OWDNAUNE WN 9 OD NO UE WN O OONOUN SE wire 


COoooooeoo 
COD 00 09 00 00 09 090008 NIN NSN NSN INIO OOO 


outa" 


Dect 


00000028 


SPAT 
arat 


ons 
-SBTTL Declarations 


4 ; MACRO LIBRARY CALLS 


i | es De | “wn i oe | 


; LOCAL SYMBOLS 


Be te De 


SDEFINI BDT 


SDEF  BDTSL_CPUTYPE .BLKW 
SDEF BDTSL-DEVTYPE TBLKW 
$DEF  BDTSLTACTION BLKL 
$DEF BDTSL“SIZE TBLKL 
SDEF  BDTSL-ADDR SBLKL 
SDEF § BDTSL-ENTRY “BLK 
$DEF  BDTSL-DRIVRNAME .BLK 
$DEF BDTSLAUIDRNARE “BLK 
$DEF § BDTSLZUNIT_INIT .BLK 
SDEF  BDTSLUNIT~DISC -BLKL 
$DEF  BDTSLDEVNAME § -BLKL 
BDTSK_LENGTH=. 


FAO DONO NE WWIN 9 OD NOAM EWIN [OOO NOAU EW OOONOM 


WWII AIAIRPOPOPSPNIPONNN 2 2 SB OQOOOOOOOOO/~ 


mt ts ss a tk ss a ss ss ss st 


SDEFEND BDT 


4 
HER FOR BOOTSTRAP 1/0 DRIVERS F Ye eet 
-JUL=1 


eh et tS a Ss 


Sh IESG) EASON ace, yoo~m 


ate offsets 
evice types 


= 


$s 

R Gist RS 
ABLE FIELDS 
4 PARAMETER BLOCK 


$ CODES 
ER REGISTER DEFINITIONS 
us ogagter regs 
UAL ADDRESS FIELDS 


o--CcCouVTuTZVToVTUVTTo 

Mm—ZmMmmmnmmmne @ 

2 3Sos"ma nn we 
ae meon 


Define Boot Driver Table offsets 


Boot *xB° device type 
Action rout ne 

Driver size 

Driver address (offset) 

Driver entry (offset en address) 
Driver name (offset from address) 
Auxiliary driver name (offset) 

Driver unit init (offset from address) 
priyer unit disc (offset from address) 
Device name (offset from address) 


Length of entry 


; End of Boot Driver Table definitions 


4 
ran 10 valves Nece-is TERT CRO, 


~SBTTL ORIVER FIXED DATA AREA 


VOS-008 DRIVER. 


m— 
Pt) 


FIXED DATA CELLS FOR BOOTSTRAP DRIVER 


0000 -PSECT BOOTDRIVR_1,LONG ; CERTAIN DRIVERS REQUIRE ALIGNMENT! 
BOOSAL _VECTOR:: 3; VECTOR TO BOOT DRIVER ENTRY POINTS 
000046' -LONG BOOSQIO-BOOSAL_VECTOR ; OFFSET TO 49 dA Md Q10 ROUTINE 
0000A6' -LONG BOOSMAP-BOOSAL”“VECTOR ; OFFSET TO MAPPING ROUTINE 
000000' -LONG BOOSSELECT-BOOSAL_VECTOR; OFFSET TO BOOTSTRAP. /0 DRIVER 
3 ee ROUTINE WHICH 
00000000 5 -LONG 0 : OFFSET TO SYSTEM DISK DRIVER NAME 
; ; (ASCIC STRING). SET UP BY BOOT DRIVER. 
The next two words are the version number and the version number check fields. 
: (The second word is the ones complement of the first word.) The version 
number should be incremented whenever the interface between VMB and the 
: rest of the system changes. Release 1.0 VMB did not contoin these tlelds. 
5 Version 2 - Boot driver passes system disk driver name to SYSBOOT 
5 Version 5 = VMB build memory descr pt ion vector into RP 


Version 4 - vmB BOOTDRIVR rpurges ith, buffered datapath, all drivers 
return to BOOT we A success/failure status 

Version 5 = VMB asses an argument List to the pesondery boot 
in’ » FILEREAD cacheing is present 

Version 6 - VRB passes penus device type of boot “adapter in 

Version 7 - BOOSAC” VECTOR now has new entry points for RESELECTing 
a drivér and UNIT_INIT for a driver. Also new info 
pas ssed in the argument List. 

Version 8 = BOOSAL_VECTOR now has a new cell: BQO$L_UCODE. 

Version 9 = VMB paSses number of bad ponery pages found during 
bootstrap scan in RPBSL_B 

Version 10- BOOSAL. VECTOR has two is ge UNIT_DISC and DEVNAME 


Version 11= BOOSAL_VECTOR has two new cells: TENUSEC and UBDELAY 


ASSUME <,-BOOSAL_VECTOR> EQ BQ0SW VERSION 
.WORD. 11,°C<11>" RSION # AND VERSION # CHECK FIELD. 
“LONG BOOSRESELECT-BOOSAL VECTOR Offset to set new driver 

~ LONG re ti Fig OR oftset. to, routine to colaek and move 
ASSUME <.-BOOSAL_ OECTORS EQ Boob. UNIT 


NOUS WN O ODNOA UNE WR | O ODNOA UE WN O DOONAN EW OOOO 
ee te ee 


"ga6o8det 


PRIPIPIPDPOPIPIPIPIPOPY a a rr nn nn a a a ot I tt 3B QOOOOOCOOCOCOOCOOCOCOOCOOCO 
PODWDODL & HK LOOM MD LOOSCOOOOSOOOOOOOOOOCSOOOOCOCOCOSOMAAMDWLSOOOCOCOCOSOSO —-m- 


00000000 ? -LONG 0 ‘ee ro Twit. INIT 

§ ASSUME <.-BOOSAL_VECTOR> EQ Boog. NUKSR NAME 
00000000 -LONG 0 ; Offset to auxiliary driver name 

4 : second driver 

5 ASSUME <.-BOOSAL_VECTOR> EQ Boost UMR_DI 

§ BOOSGL -UAR DIS:: ; Rumbér of map registers disabled 
00000000 0 

8 ASSUME <.~BOOSAL_VECTOR> EQ BQOSL UCODE 

BOOSGL_UCODE:: ; Address of microcode in memory 
00000000 9 LON 0 
ASSUME <.~BOOSAL_VECTOR> EQ vo yait DISC 

00000000 92 -LONG O ; Offset to UNIT_DISC 


VOS-008 
00000000 

80000000 

01 

01 

00000001 

00000001 


00000001 


N 4 
HER FOR BOOTSTRAP 1/0 DRIVERS F 1QAUG=1984 
XED DATA AREA “JUL 
1 ASSUME <,-BOOSAL_VECTOR> EQ 
1 .LONG. 0° 
1 ASSUME <.-BOOSAL_VECTOR> EQ 
1 ‘ BOOSGL_UMR_TMPL:: 
19 .LONG  UBASM_MAP_VALID 
19 ASSUME <.-BOOSAL“VECTOR> EQ 
1 BO0$GB_UMR DP: , 
1 ASSUME <.-BOOSAL_VECTOR> EQ 
; EXESGB_CPUTYPE: 
4 ASSUME <.-BOOSAL_VECTOR> EQ 
5 EXE$GB tc aes 
$ ASSUME <.=BOOSAL_VECTOR> Ed 
08 EXESGL_TENUSEC: : 
10 ASSUME <.-BOOSAL_VECTOR> EQ 
11 EXESGL_UBDELAY:: 
12 .LONG 1 


1:83:99 SootDRi vasAaR: 


BQOsL DEVNAME 
Of set fo boot device name 
soot. UMR 
; ON 1805 nip 
pet oult $ 


y04~00 


register template 
valid, no buff data path 


register data path 
Buffered #1 


tae to hold processor 
sonst ication code 


sek CPUD 
to hold contents of SID. 


coke 


etbest’ be 


BQOSL_TENUSEC 
ocation to hold TIMEDWAIT delay count 
ult is value needed for Micro-VAX 


; Defa 
BOQO$L_UBDELAY 
ocation to hold TIMEDWAIT delay count 
is value needed for Micro-VAX 


Default 


; Offsets from AP to input arguments: 


00000004 BUF = 4 
Suse ect 
= 
SSS me iit 
0000014 MODE = st 
00000018 RPB = 24 
BOOSQIO:: 
OFFC «WORD “M<R2,R3,R4,R5,R6,R7,- ; PRESERVE REGISTERS 


RB,RO.R10,R11> 


= 


oO 
= 
PAAOO OS WOOO] OIVQIOOIIIOP*- D> DD DDD DD DDD DDD DDD P PAPA AAA AAA A AAA AAA AA AA AAAS 


If mapping is enabled, the processor register RPS_MAPEN contains a 1. 
Otherwise, the register contains a 0. Use this value as an index to 
choose the appropriate address of the adapter's register space. 


5 
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OOS 008 BOO$QI0 = BOOTSTRAP QI0 ROUTINE =JUL=1984 1:99:98 BOOTDRIVR MAR: 1 - «@ 
4 4 .SBTTL BOO$SQIO - BOOTSTRAP Q10 ROUTINE 
4 3++ 
é 5 + FUNCTIONAL DESCRIPTION: 
4 ; BOOSQIO PROVIDES THE DEVICE INDEPENDENT I/O INTERFACE FOR BOTH 
04 READING AND WRITING THE BOOTSTRAP DEVICE. 
, : CALLING SEQUENCE: 
4 4 ; CALLG ARGLIST,BOOSQIO 
oe $ t INPUT PARAMETERS: 
§ 8 ; BUF(AP) = BUFFER ADDRESS 
04 : SIZE(AP) = SIZE OF BUFFER IN BYTES 
04 0: LBN(AP) = LOGICAL BLOCK NUMBER 
04 1: FUNC(AP) = FUNCTION CODE 
04 : : ACCEPTS I0$_READLBLK AND 10$_WRITELBLK 
04 : MODE(AP) = ADDRESS INTERPRETATION MODE 
04 4; 0 => PHYSICAL, 1 => VIRTUAL 
04 5: RPB(AP) = ADDRESS OF RESTART PARAMETER BLOCK 
04 : OUTPUT PARAMETERS: 
04 9: RO = COMPLETION STATUS CODE 
04 : ; Ri = TOTAL BYTES TRANSFERRED 
04 : io 
04 
04 4 
04 5 
te 548 
04 0 
Bee $8 
ss ie 
4 4 
gis 
a 
0 


PPP DPE PAA Be BB B= BB NAINA PPNINNPNONONPON | SS 


ooo 


PPPre 


59 18 AC 00 MOVL RPB(AP) ,R9 ; GET BASE ADDRESS OF RESTART PARAMETER BLK 
; For the QBUS, if the transfer MODE is physical, the BUF address contains 

; the pays eet address of a SIZE physically contiguous bytes. The Driver 

; assumes $. 


COOSOOOCSOOCOCOSOOOCOOOOOOOOOOOOOOOOOCOOOOOOOOOOOO OOOO OOOOOOOOOOoOO UU 


Hee Ante 
Sete ee eee 


BRR 
rt ot 


. 
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703-008 Boosero - BOOTSTRAP Q10 ROUT INE eee 7 19:99:98 BOOTDRIVR-MAR: 1 . (4) vos 
4¢ 4 § ; If the MODE is 1 then the BUF address is translated into two components: 
; A physica ase address and a ‘‘virtual’’ address relative to tha e 
| ; A physical PTE b dd d a ‘virtual’ add lat to that PTE 
4C 409° 
A 4 AC pe & 4 ? mov | buf(ap),r1 ; get basic buffer address 
; £ AC & movl lLon(ap),ri ; get LBN 
AC 4 ‘ movzwl si e(aps,r8 : get the size 
9 8 4 bneq 0 3s if neg then size < 64K 
58 01 g A 634 ashl #16,#1,r8 3; set 64K 
5 D4 3 435 108: clrl r 3; assume no PTE base address 
26 14 A E9 6 4 § blbc mode (ap) ,30$ ; br if mode is physical 
52. SOA dO B08 4 mov rpb$l_svaspt(r9) ,r2 ; assume system address 
4 $ ; address SYSP 
$8 4 ; This address is physical if 
6 re ; mapping is OFF and a VA if ON 
03 SA 1F €E2 006 44 bbss #vaSv_system,r10,20$ ; br if system address 
06C rr ; seteing the bit is the key to the 
06C 44 : QBUS that the transfer is mapped. 
3 08 DB O06C 444 mfpr #pr$_pObr,r2 ; Get the PHYA or VA of the PO PT 
5 38 «(OD 5 445 20$: mfpr eprs_sapen.r0 3 mapping enapied? 
16 #1 072 rr beql 30$ ; br if no, r2 is physical 
bore te 
Be 4s > convert the R2 address which is system virtual to a physical address 
7% «451 * 
i fe cam ae Ope $26 extzv #va$Sv_vpn.#va$s_von,r2,r0; get PFN from SYS VA 
50 508940 dO 0079 45 movi arpb$l_svaspt(r9)[r6J,r0; get PTE for that page for SYS PTE 
50 FFEO0000 ef CA 007 454 bicl #*c<pteSm_pfn>,r0 ; isolate PFN 
52 17 09 0 FO 4H $23 insv r0,#va$v_vpn,#va$s_vpn+2,r2; convert to PHYSICAL PTE base 
O8A 458; 
508A 135 ; If it is a UNIBUS boot device, derive the address of the device's CSR. 
SH ge 
BEA 186 ASSUME RPBSL_CSRVIR EQ RPBSL_CSRPHY+4 
50. 38 8 tty 464 30S: MFPR #PR$_MAPEN,RO ; Check for mapping enabled 
57 54 A940 0D 38 ret MOVL RPBSC_CSRPHY(R9)CROJ,R7 ; Get address of device's CSR 
$3 te PUSH_RETRY: 
OA 0D 5 $98 PUSHL #10 ; Push retry count on stack 
55 8 D 94 £9 108: MOVL R11 ; Get a working copy of the block number 
50 34 A D 97 471 MOVL RPBS$L_IOVEC(R9) Y, ; Get address of boot vectors 
08 8040 1 98 tig JSB Heat SELECT(RO)CRO) =: Call driver thru self-relative vector 
0350 € OF 4 1908: BLBS RO,20 ; ; Branch if success 
EF 6E OF A2 484 150$:  SOBGTR (SP),108 : Retry if count > 
04 A 485 200$: RET ; Return with final status in RO 


EE 


VOS-008 soBbSRSTeMEBLFORPORTALENS 10 ORTUEREF TOCAUGTORE TEO4O8 yan ogre. yOs-00 eae“ vos 


A i. .SBTTL BOOSMAP = ROUTINE TO MAP DATA FOR B00SQI0 | 
Ad = 489 5+ 
YY ae 0 ; FUNCTIONA aQESCRIPTION: 
M6 491: IS CALLED TO INITIALIZE THE DATA BASE FOR BOOSQIO TO PERMIT 
A 43¢ ; ie TO FUNTION WITH MEMORY MANAGEMENT ENABLED. AN AREA OF SYSTEM 
M6 «0493: PAGE TABLE MUST BE PROVIDED SO THAT THE CONFIGURATION REGISTERS AND 
‘ 43% ; UNIBUS 1/0 PAGE CAN BE MAPPED. 
A 496 ; CALLING SEQUENCE: 
‘ 43 ; CALLG  ARGLIST,BOOSMAP 
A rh + INPUT PARAMETERS 
A 0; SV ASPTCAP) - SYSTEM VIRTUAL ADDRESS OF THE SYSTEM PAGE TABLE 
00000004 00A i SVASPT 
Bae § 3 VABASE (AP) - BASE VIRTUAL ADDRESS OF A 24 PAGE WINDOW TO MAP 
OA ; THE ADAPTER CONFIGURATION REGISTERS AND UNIBUS 
00000008 OAG , VABASE = ® as 
Bae 6 : RPB(AP) = ADDRESS OF RESTART PARAMETER BLOCK (RPB) CONTAINING 
OA6 507 BOOTSTRAP DEVICE DESCRIPTION. 
0000000¢ OAG 08 RPB = 12 
OA6 510 : OUTPUT PARAMETERS: 
OA6 33 NONE 
OA6 \§ 3 
an 
OOFC OO0A 15 BOOSMAP: : .WORD.  “M<R2,R3,R4,R5,R6,R7> 
57 C DO OOA 18 MOVL = RP. BAP) ik : GET Base ADDRESS FOR RPB 
52 04 AC DO OAc 1 MOVL SVASPT (A R2 : GET BASE OF SPT 
30 a? 52.—S«s«éw0ds«éBOSts«é*S 18 MOVL RPBSL oh ae ; AND SAVE IN DATA BASE 
5308 AC DO 00B4 319 MOVL Wabne : GET VIRTUAL ADDRESS OF WINDOW 
60 a7 D0 8 Q MOVL R3 APBSe ADPVIR(R7) SET AS ADAPTER VIRTUAL ADDRESS 
50 53 15 EF get 3 EXT2ZV pratt VPA, #VASS_VPN.R rb GET BASE VIRTUAL PAGE 
51 6240 D 6 C1 6 MOVAL (Re) CROJ JR ; compute WORKING SPT POINTER 
55 10 DdO0 00C5 MOVL co FOR 16 PAGES 
54 54 A7 OOO01FFF af CB OCB 1 BICL3 sae Pest _ CSRPHY(R7) .R4 : GET PHY ADDR OF 1/0 PAGE BASE 
5454 9 D1 é ROTL ; AND CONVERT TO PAGE NUMBER 
1 OD5 BSBB STORE PTES INTO 
59 4A C 00D 4 MOVZWL Rpt fete RO GET I/O PAGE OFFSET 
58 A? FFFF 000° £043 9& 00DB 5 MOVAB  <*X1000-*XE000>(RO)CR32, roi CSRVIR(R7) ; SET VIRTUAL CSR ADDR 
04 EG 6 RET 
E 8 ++ 
E 33 : FILLSPT 
E ty + INPUTS: 
E 42 : R1 = POINTER TO CURRENT SPT ENTRY (UPDATED) 
E 43: R4 = PFN (UPDATED) 
é rt ; R5 = COUNT OF PAGES TO FILL (UPDATED) 
E 46 FILLSPT 
81 54 90000000 C9 O0E 4 BISL3 #<PTESM_VALID!PTESC_Kw>, R4 (R1)+ ; STORE A PTE 
D ED 48 INCL ; ADVANCE TO NEXT PFN 
f3 55 OF EF 54 SOBGTR RS,FILLSPT : STORE THEM ALL 
0 F2 550 RSB 
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v08-008 BOO 3 19:93:98 1 - 


AP = ROUTINE TO MAP DATA FOR BOO$SQ1 9-JUL-1984 BOOTDRIVR.MAR; (7) 
F3 § . ALIGN Lous 3 A tonnens needed by some drivers!!! 
QOO000F 4 2 BOO$SQI0S1Z=.-BOOSAL_VECTOR ; Size of boot Q10 routine 
O00000F4 F4 BOOSDRIVER==, ; Start of boot driver (after 
F4 ; it's been moved) 
F4 ; NOTE: Boot drivers must be in 
* 3; psect BOOTDRIVR_ 
0000 4 -PSECT BOOTDRIVR_3 
00000000 § BOOSDRIVER_TBL=. ; Boot driver table 
0000 é 3 -PSECT BOOTORIVR_5S 
00000000 6 o79 «LONG 0 ; End of boot driver table 
00000000 642 -PSECT BOOTDRIVR_6 


eucea 


50 


007E ef 
OO7E 8F 


34 AY 
08 8040 


Coooooooooooeo 


OOoOOCOCoOoCooooooooooo 


m>PPrrros 


on S00,S TRAE 1/0 oRLvEhS F To-aye-1ane 1804 


FUNCTIONAL DESCRIPTION: 


This routine is called 
t searches the boot driver 
he correct Linkage is made 

RPBSL_IOVECSZ is also stored with 

the size of the driver. 


; CALLING SEQUENCE : 


JSB BOOSSELECT 
vector 


PPPS So 


R9 Address of the RPB 
: OUTPUT PARAMETERS: 
None 


: INPUT PARAMETERS: 
B 


OOSSELECT: 
PUSHR = #*M<R1,R2 ase R4,R5,R6> 


BSBB =: BOOSRESE ELECT 
POPR #*M<R1,R2,R3,R4,R5,R6> 
; Set up driver vector and jump to driver. 


MOVL = RPBSL_IOVEC(R9) RO 
JMP aBQo$C_SELECT(RO) CROJ 


PAEAAAAAAAAAAA AAAS A AAA OO AAAAS POOP AOAAS 
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-SBTTL BOOSSELECT = Select boot driver 


he as time BOOSQIO calls a driver. 
- *BsOgA 


aa ‘vector e ® proper driver. 
the” size of BOOSQI0 plus 


The driver is then jumped to. 


called through self-re 


lativ ? 
BOOSAL_VECTOR+BQ0$L_SELECT) 


; Select the correct driver 


; Get address of vectors 
; Jump to driver 
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508-008 BOOSMOVE = Select and move boot ricer meets 7 19:93:98 BOOTDRIVR MAR: | - (9) 
001 -SBTTL BOOSMOVE = Select and move boot driver 
Bs 
001 ; $ FUNCTIONAL DESCRIPTION: 
001 5: This routine is called after vn is finished with a driver. 
001 § 3 It searches the boot driver table to locate the proper driver. 
+4 ; The correct Linkage is made in BOOSAL_VECTOR and driver moved. 
14 5 $ CALLING SEQUENCE: 
001 ? : JSB BOOSMOVE (Actually called through self-relative 
44 es : vector in BOOSAL_VECTOR+BQ0$L_MOVE) 
14) 694 : INPUT PARAMETERS: 
le 3 
44 638 3 Rg Address of the RPB 
‘ 3 
+f O28 ; OUTPUT PARAMETERS: 
OU 3 
1 § 9 3 None 
1 701 ; 
15 F083 * 
1 704 BOOSMOVE: 
OOFE 8F 58 1 705 PUSHR #*M<R1,R2,R3,R4,R5,R6,R7> ; Save registers 
48 1 16 #7 6 BSBB  - BOOSRESEL : Select the correct driver 
26 C B54 9E 1 7 MOVAB ve AS ADDR(RS)CRS],R6 ; Address of current position 
4 OFS'CR 9 19 7 $ MOVA W*BOOSBRIVER,R4 ; Address of new position 
57 6 4 C 7 SUBL R4,R6,R 3; Offset 
4 1 3 710 BEQL 20$ 3 None, so don't move 
68 AS § 711 MOVCS BDTS$L_SIZE(R5),(R6),(R4); Move driver 
4  0000'CF D ar MOVAB W*BOOSAL_VECTOR.R4 
m o£ : 71 SUBL2 R7,BQO$L~SELECT(R4) ; Adjust offset 
C AG ae 714 SUBL R7 tag tt DRIVRNAME (R4) 
20 a6 OD A 715 TSTL  BQOSL_AURDRNAME (R4) : Is there one? 
9 1 D ay BEQL $ ; No, don;t mess 
20 A4 7 C F 71 SUBL2 R geoe. AUXDRNAME (R4) 
10 AG OD 43 £18 10$: =‘ TSTL QO$L_UNTT_INIT(R4) ; Is there one? 
9% 1 rt 71 BEQL 3; No, don;t mess 
1C A4 7 C 4 720 SUBL2 R QO$L_UNIT_INIT(R4) 
2c Aa OD 4C 721 208:  TSTL gad L_UNTT_DISC(R4) : Is there one? 
96 1 4- 67 BEQL $ 3; No, don;t mess 
2C AG Qe 4 SUBL2 R gaost UNIT pisccra) 
30 a6 OD 30$:  TSTL  BQOSL_DEDNAMETRA) : Is there one? 
S-a% 725 BEQL 3 No, don;t mess 
30 A4 ee A 7? § SUBL2 R/7,BQO$L_DEVNAME(R4) 
OOFE 8F BS 7 40$: POPR #*°M<R1,RZ,R35,R4,R5,R6,R7> 
5 4 RSB 
7350 BOOSRESELECT: 
55  0000'CF pe 7 MOVAL W*BOOSDRIVER Tat oR ; Get address of boot driver table 
53 g Ag A 7 ; MOVZBL RPBSB_DEVTYPTRI).R ; Get value of boot device type 
3 90 fe A f MOVZBL W*EXESGB_CPUTYPE ; Get cpu type 
6 F4‘ BF C 4 : MOVZWL #<BOOSDRIVER-BOOSAL _VECTOR>,R6 ; Compute offset to driver table 
8 6 : Determine if next driver in table is the correct one. 
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3 Have the oe driver. R5 


MOVA 
ADDL 


; T$L_CPUTYPE (RS) ,RO 
RO, RS 
40$ 
Spgs : 
RO,R3 : 
408 : 
BDTSL_ACTION(R5) .RO 
CR ) R0] 


4 ¥IZECRS) R6 
pTaR “LENGTH, RS 


u°BOOSAL VECTOR, R4 
#800$010S17,- 
BDTSt Ss seo CRS) 
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BQO$L _AUXDRNAME (RG) 3 
TSL-AUXDRNAME (R5) ,R1 : 


R6,R1,BQ0$L LAUXDRNAME (R45; 


BQOSL_UNIT_DISC(R4) 
TSLIUNITIDISC(RS) RI 


R6,R1,BQO0$L_UNIT _DISC(RGS 


BQO$L _DEVNAME (R4) 
tos * —DEVNAME (R5) ,R1 
R 


eR1,BQOSL_DEVNAME(R4) ; 


SraUe=19be 19:98:98 
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get cou Ay from table 


atete Se doesn't care about cpu type 
types match? 
No, try next driver 


; Get boot device type from table 
; Driver doesn't care about device type 


Device types match? 


; No, try next driver 


Get action routine offset from table 
No action routin 7 this is the driver 
Call action routin 
qrencs if this is” the driver 

peouns for this driver's size 

nt to next driver entry 
_ next driver 


oints to driver table entry. R6 contains 
: accumulated offset from IOVEC to the start of the driver. 
3 pertainent entries in the IOVEC. 


Update 


Cover the vector 

Add boot glo size to 

driver si ze 

and store in RPB 

Calc offset to driver 

entry point and tore in vector 
Calc offset to driver 

name one stare in vector 
Plek up possible UNIT INIT ent 

¢ oe e entr 
; None speci seb default to a REY 

snes offset to driver 

UNIT ofl! -P° nt and store in vector 


H 5 aeoadl no 


Pick up possible dr driver name 

None specified, default to a zero 
Cale offset to driver 

aux utitery name and store in vector 


none 
Pick u ible UNIT DISC entr 

None specified, default to a sere 

: Cole offset to driver 

UNIT_DISC point and store in vector 


, Aeound hone 


; Pick up pos ssible device name 
; None specified, default to a zero 
Cale offset to device 

name and store in vector 


; No driver in the driver table accepted this Q10 
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! Psect synopsis ! 


toewoeooenee semen y 


PSECT name Allocation PSECT No. Attributes 


aes . ( 8} 9 ( 0.) NOPIC USR (CO ABS LCL NOSHR NOEXE NORD NOWRT NOVEC BYTE 
ABS ( 40.) ( 1.) NOP USR CON ABS LCL NOSHR EXE RD WRT NOVEC BYTE 
BOOTDRIVR_ F ( 244.) § ( 2.) NOP USR CON REL LCL NOSHR EXE RD WRT NOVEC LONG 
TORIVR_ 8 ( 0.) ( ») NOP USR CON REL LCL NOSHR EXE’ RD WRT NOVEC BYTE 
BOOTDRIVR_ ( 3°} 4 ( -) NOPIC USR CON REL LCL NOSHR Bx RD WRT NOVEC BYTE 
TORIVR_ fF ( 267.) 5 ¢ -) NOPIC USR CO REL LCL NOSHR XE RD WRT NOVEC BYTE 
termes eeeceseseecec we eee ewe = $+ 
: Performance indicators H 
Phase Page faults CPU Time Elapsed Time 
Initialization 9 :00:00. § :00: 0.36 
Command processing § 7:00:00. :00:01.1 
Pass 1 3 :00:12. ? :00: #9 
Symbol table sort :00:02. :00:02. 
ass 9 :00:02.81 :00: 8? 
Symbol table output :00:00.08 :00:00. 
Psect synopsis output :00:00.04 :00: :' 
Cross-reference output :00.00 :00:00. 
Assembler run totals 54 61 0:00:22.6 


Ing working ses Limit was 1350 pages. 

79271 bytes_(155 pages) of virtual memory were used to buffer the intermediate sode. 

There were 70 pages of symbol table space allocated to hold 13435 non-local and 21 local symbols. 
798 source Lines were read in Pass 1, producing 19 object records in Pass 2. 

21 pages of virtual memory were used to define 20 macros. 


teeeceoeoeoeece eee eeeooeeeoce=s & 
H Macro Library statistics : 
Macro Library name Macros defined 
RE Ee ae TAR UORE DE * b GARACIE -UV IRON. VS It 1BUVI LA 
DISKSSTARWORKOS: Peete PY TRON. Qed VMB.MLB; 
pi eer spon] "yay el! JSTARLET.MLB; 
TOTALS (all Libraries) 16 


1414 GETS were required to define 16 macros. 
There were no errors, warnings or information messages. 
MAC/LIS=L1IS$:BOOTDRUV1/0BJ=0BJ$:BOOTDRUV! VMS$:BOOUV1SWT+VMS$:BOOTDORIVR+OBJ$: VMB/LIB+VMS$:LIBUVI/LIB 
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